<script>-- Includes the LockCursor 1.02 XCMD by Jeff Winkleron openCardLockCursor trueLockCursor crosshairsend openCardon arrowKey directionif direction = left then send mouseUp to cd btn id 4if direction = right then send mouseUp to cd btn id 3exit arrowKeyend arrowKeyon mouseUpLockCursor stackwatchput "" into cNchoose Bucket toolget the patternset pattern to 12click at the clickLocset the pattern to itif CheckPixel(97,59) = true then put WA into cNif CheckPixel(89,92) = true then put "OR" into cNif CheckPixel(71,147) = true then put CA into cNif CheckPixel(107,140) = true then put NV into cNif CheckPixel(130,101) = true then put IDaho into cNif CheckPixel(143,144) = true then put UT into cNif CheckPixel(135,194) = true then put AZ into cNif CheckPixel(173,74) = true then put MT into cNif CheckPixel(179,113) = true then put WY into cNif CheckPixel(186,154) = true then put CO into cNif CheckPixel(180,199) = true then put NM into cNif CheckPixel(231,75) = true then put ND into cNif CheckPixel(230,104) = true then put SD into cNif CheckPixel(233,130) = true then put NE into cNif CheckPixel(242,163) = true then put KS into cNif CheckPixel(251,194) = true then put OK into cNif CheckPixel(234,234) = true then put TX into cNif CheckPixel(273,89) = true then put MN into cNif CheckPixel(279,129) = true then put IA into cNif CheckPixel(288,166) = true then put MO into cNif CheckPixel(288,199) = true then put AR into cNif CheckPixel(289,232) = true then put LA into cNif CheckPixel(386,259) = true then put FL into cNif CheckPixel(312,219) = true then put MS into cNif CheckPixel(335,216) = true then put AL into cNif CheckPixel(368,214) = true then put GA into cNif CheckPixel(386,202) = true then put SC into cNif CheckPixel(339,187) = true then put TN into cNif CheckPixel(393,183) = true then put NC into cNif CheckPixel(317,85) = true then put MI into cNif CheckPixel(343,113) = true then put MI into cNif CheckPixel(305,105) = true then put WI into cNif CheckPixel(313,146) = true then put IL into cNif CheckPixel(336,145) = true then put IN into cNif CheckPixel(360,141) = true then put OH into cNif CheckPixel(350,168) = true then put KY into cNif CheckPixel(397,161) = true then put VA into cNif CheckPixel(376,157) = true then put WV into cNif CheckPixel(405,143) = true then put MD into cNif CheckPixel(419,148) = true then put DE into cNif CheckPixel(397,130) = true then put PA into cNif CheckPixel(421,128) = true then put NJ into cNif CheckPixel(412,105) = true then put NY into cNif CheckPixel(432,116) = true then put CT into cNif CheckPixel(441,114) = true then put RI into cNif CheckPixel(435,108) = true then put MA into cNif CheckPixel(427,89) = true then put VT into cNif CheckPixel(436,98) = true then put NH into cNif CheckPixel(451,72) = true then put ME into cNdoMenu Undochoose Browse toolif cN = empty thenLockCursor crosshairselselock screengo cd cNscreenChangeend ifend mouseUp</script>
</card>
card_71055.xml
<?xml version="1.0" encoding="utf-8" ?>
<!DOCTYPE card PUBLIC "-//Apple, Inc.//DTD card V 2.0//EN" "" >
<script>-- Includes the LockCursor 1.02 XCMD by Jeff Winkleron openCardLockCursor trueLockCursor crosshairsend openCardon arrowKey directionif direction = right then send mouseUp to cd btn id 17if direction = left then send mouseUp to cd btn id 16end arrowKeyon mouseUpLockCursor stackwatchput "" into cNchoose Bucket toolget the patternset pattern to 12click at the clickLocset the pattern to itif CheckPixel(106,140) = true then put YT into cNif CheckPixel(214,157) = true then put NT into cNif CheckPixel(102,213) = true then put BC into cNif CheckPixel(150,219) = true then put AB into cNif CheckPixel(188,243) = true then put SK into cNif CheckPixel(231,228) = true then put MB into cNif CheckPixel(278,256) = true then put ON into cNif CheckPixel(334,237) = true then put PQ into cNif CheckPixel(374,202) = true then put NF into cNif CheckPixel(416,219) = true then put NF into cNif CheckPixel(382,257) = true then put NB into cNif CheckPixel(394,267) = true then put "NS/PE" into cNif CheckPixel(359,271) = true then put NB into cNdoMenu Undochoose Browse toolif cN = empty thenLockCursor crosshairselselock screengo cd cNscreenChangeend ifend mouseUp</script>
</card>
card_11706.xml
<?xml version="1.0" encoding="utf-8" ?>
<!DOCTYPE card PUBLIC "-//Apple, Inc.//DTD card V 2.0//EN" "" >
<script>on mouseDownif the icon of me = 11120 thenset the icon of me to "Box Check"elseset the icon of me to "Box Empty"end ifend mouseDown</script>
</part>
<part>
<id>2</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>73</left>
<top>95</top>
<right>87</right>
<bottom>109</bottom>
</rect>
<style>transparent</style>
<showName> <false /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <false /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>11120</icon>
<textAlign>center</textAlign>
<font>Chicago</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name>Check Box</name>
<script>on mouseDownif the icon of me = 11120 thenset the icon of me to "Box Check"elseset the icon of me to "Box Empty"end ifend mouseDown</script>
</part>
<content>
<layer>background</layer>
<id>3</id>
<text>You can type information in these fields and put checks in the boxes by clicking on them. Select this text and press "Backspace" or "delete" to get rid of it. For updates, please send a 800K or 1.44MB disk to the address below.</text>
</content>
<name>Registration Form</name>
<script>-- Includes the LockCursor 1.02 XCMD by Jeff Winkleron arrowKeyend arrowKeyon idleLockCursor trueLockCursor pointerend idle</script>
</card>
card_145364.xml
<?xml version="1.0" encoding="utf-8" ?>
<!DOCTYPE card PUBLIC "-//Apple, Inc.//DTD card V 2.0//EN" "" >
<text>City codes are not required.AganaAganaAganaAganaAganaAganaAganaAganaAganaAganaAganaAganaAganaAganaAganaAganaAganaAganaAganaAganaAgatBarrigadaDededoInarajanMerizoSanta RitaTamuningYona</text>
</content>
<name>GU</name>
<script></script>
</card>
card_86554.xml
<?xml version="1.0" encoding="utf-8" ?>
<!DOCTYPE card PUBLIC "-//Apple, Inc.//DTD card V 2.0//EN" "" >
<text>All locations have this area code.In addition, the following areas share the 809 area code:Anguilla*, Antigua, Bahamas*, Barbados, Barbuda, Bermuda, BritishVirgin Islands, Caicos Islands*, Cayman Islands*, Cuba*, Dominica,Dominican Republic, Grenada, Jamaica*, Montserrat, Nevis, PuertoRico, Saint Croix, Saint Kitts, Saint Lucia, Saint Vincent, Tobago,Trinidad, Turks*, Virgin Islands. See the other locations in this stack.*These locations lie within the GMT -5 time zone.</text>
</content>
<content>
<layer>background</layer>
<id>2</id>
<text>GMT -4 (-1) (Atlant.)</text>
</content>
<name></name>
<script></script>
</card>
card_102154.xml
<?xml version="1.0" encoding="utf-8" ?>
<!DOCTYPE card PUBLIC "-//Apple, Inc.//DTD card V 2.0//EN" "" >
<text>AltamontAltamontAltonAmerican ForkAmerican ForkAnethAnnabellaAntimonyAuroraAxtellBear River CityBeaverBennionBerylBicknellBingham CanyonBlandingBlandingBluebellBluffBoulderBountifulBountifulBrian HeadBridgelandBrigham CityBrigham CityBrigham CityBryceBryce CanyonCannonvilleCastle DaleCedar CityCedar CityCedar CityCedar ValleyCenterfieldCentervilleChesterCirclevilleCiscoClarkstonClawsonClearfieldClearfieldClevelandClintonCoalvilleCorinneCornishCottonwoodCottonwood HeightsDeltaDeweyvilleDraperDuchesneDugwayDutch JohnEast CarbonEast MidvaleEast MillcreekEchoEdenElbertaElmoElsinoreEmeryEnterpriseEphraimEscalanteEurekaFairviewFarmingtonFayetteFerronFieldingFillmoreFort DuchesneFountain GreenFruitlandGarden CityGarlandGarrisonGlendaleGlenwoodGoshenGranite ParkGrantsvilleGreen RiverGreenvilleGrouse CreekGunlockGunnisonGusherHanksvilleHannaHatchHatchHeber CityHelperHeneferHenrievilleHiawathaHill Air Force BaseHinckleyHoldenHolladayHoneyvilleHooperHowellHuntingtonHuntsvilleHurricaneHyde ParkHyrumIbapahIvinsJensenJunctionKamasKamasKanabKanabKanarravilleKanoshKaysvilleKearnsKenilworthKingstonKoosharemLa SalLa VerkinLaketownLapointLaytonLaytonLaytonLeamingtonLeedsLehiLevanLewistonLoaLoganLoganLymanLynndylMagnaManilaMantiMarysvaleMayfieldMeadowMendonMexican HatMidvaleMidwayMilfordMillvilleMinersvilleMoabModenaMonaMonroeMonroeMonroeMontezuma CreekMonticelloMonument ValleyMorganMorganMoroniMount CarmelMount OlympusMount PleasantMountain HomeMurrayMytonNeolaNephiNew HarmonyNewcastleNewtonNorth OgdenNorth Salt LakeOak CityOakleyOasisOgdenOgdenOgdenOgdenOgdenOgdenOgdenOgdenOgdenOgdenOgdenOgdenOgdenOrangevilleOrdervilleOremOremOremPanguitchParadiseParagonahPark CityPark CityPark ValleyParowanPaysonPleasant GrovePleasant GrovePlymouthPortagePriceProvidenceProvoProvoProvoProvoProvoRandlettRandolphRedmondRichfieldRichfieldRichmondRiversideRivertonRockvilleRooseveltRoyRush ValleySalemSalinaSalt Lake CitySalt Lake CitySalt Lake CitySalt Lake CitySalt Lake CitySalt Lake CitySalt Lake CitySalt Lake CitySalt Lake CitySalt Lake CitySalt Lake CitySalt Lake CitySalt Lake CitySalt Lake CitySalt Lake CitySalt Lake CitySalt Lake CitySalt Lake CitySalt Lake CitySalt Lake CitySalt Lake CitySalt Lake CitySalt Lake CitySalt Lake CitySalt Lake CitySalt Lake CitySalt Lake CitySalt Lake CitySalt Lake CitySalt Lake CitySalt Lake CitySalt Lake CitySalt Lake CitySalt Lake CitySalt Lake CitySalt Lake CitySalt Lake CitySalt Lake CitySalt Lake CitySalt Lake CitySalt Lake CitySalt Lake CitySalt Lake CitySalt Lake CitySalt Lake CitySalt Lake CitySalt Lake CitySalt Lake CitySalt Lake CitySalt Lake CitySalt Lake CitySalt Lake CitySalt Lake CitySalt Lake CitySandySandySandySandySandySandySanta ClaraSantaquinScipioSigurdSmithfieldSnowvilleSouth CottonwoodSouth JordanSouth OgdenSouth Salt LakeSpanish ForkSpring CitySpringdaleSpringvilleSpringvilleSaint GeorgeSaint GeorgeSterlingStocktonSummitSunnysideSunsetTabionaTalmageTaylorsvilleTeasdaleThompsonTooeleToquervilleTorreyTremontonTrentonTridellTropicUnionVal VerdaVernalVernalVernalVernonVirginWalesWallsburgWashingtonWashington TerraceWellingtonWellsvilleWendoverWest JordanWest JordanWest ValleyWhite CityWhiterocksWillardWoodruffWoods Cross</text>
</content>
<content>
<layer>background</layer>
<id>1</id>
<text>801</text>
</content>
<name>UT</name>
<script></script>
</card>
card_71412.xml
<?xml version="1.0" encoding="utf-8" ?>
<!DOCTYPE card PUBLIC "-//Apple, Inc.//DTD card V 2.0//EN" "" >
<script>on mouseUpif the optionKey = down thenanswer "Print this field?" with OK or Cancelif it = Cancel then exit mouseUpdoMenu "Print Field..."exit mouseUpend iflock screenput "" into cd fld id 21hide cd fld id 21set the lockText of cd fld id 21 to falsepop cardscreenChangeend mouseUp</script>
</part>
<part>
<id>26</id>
<type>field</type>
<visible> <false /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <true /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <true /> </lockText>
<rect>
<left>22</left>
<top>76</top>
<right>53</right>
<bottom>94</bottom>
</rect>
<style>transparent</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>left</textAlign>
<font>Geneva</font>
<textSize>9</textSize>
<textStyle>plain</textStyle>
<textHeight>12</textHeight>
<name>Selective Find Info</name>
<script></script>
</part>
<part>
<id>27</id>
<type>field</type>
<visible> <false /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <true /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <true /> </lockText>
<rect>
<left>22</left>
<top>51</top>
<right>50</right>
<bottom>68</bottom>
</rect>
<style>transparent</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>left</textAlign>
<font>Geneva</font>
<textSize>9</textSize>
<textStyle>plain</textStyle>
<textHeight>12</textHeight>
<name>Daylight Savings</name>
<script></script>
</part>
<part>
<id>28</id>
<type>field</type>
<visible> <false /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <true /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <true /> </lockText>
<rect>
<left>62</left>
<top>76</top>
<right>92</right>
<bottom>94</bottom>
</rect>
<style>transparent</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>left</textAlign>
<font>Geneva</font>
<textSize>9</textSize>
<textStyle>plain</textStyle>
<textHeight>12</textHeight>
<name>Beginner Or User?</name>
<script></script>
</part>
<part>
<id>29</id>
<type>field</type>
<visible> <false /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <true /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <true /> </lockText>
<rect>
<left>62</left>
<top>98</top>
<right>93</right>
<bottom>115</bottom>
</rect>
<style>transparent</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>left</textAlign>
<font>Geneva</font>
<textSize>9</textSize>
<textStyle>plain</textStyle>
<textHeight>12</textHeight>
<name>Auto Compact</name>
<script></script>
</part>
<part>
<id>30</id>
<type>field</type>
<visible> <false /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <true /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <true /> </lockText>
<rect>
<left>100</left>
<top>98</top>
<right>157</right>
<bottom>115</bottom>
</rect>
<style>transparent</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>left</textAlign>
<font>Geneva</font>
<textSize>9</textSize>
<textStyle>plain</textStyle>
<textHeight>12</textHeight>
<name>Linked PathName</name>
<script></script>
</part>
<part>
<id>33</id>
<type>button</type>
<visible> <false /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>361</left>
<top>151</top>
<right>402</right>
<bottom>188</bottom>
</rect>
<style>shadow</style>
<showName> <false /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <true /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>11114</icon>
<textAlign>center</textAlign>
<font>Chicago</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name>Area/ZIP Codes 3.1</name>
<script>-- Self Pasting script by Kevin Hughes-- Includes the TextDialog 1.3 XCMD by Jay Hodgdonon mouseUpLockCursor trueLockCursor pointerglobal bgFlag,pathName,cardLabel,exportFile,thisStackput the short name of this stack into thisStackset the name of me to thisStackif exportFile ≠ empty thenanswer "This button can't be pasted while exporting is on."¬with OKexit mouseUpend ifput " card" into cardLabelanswer "Do you want to paste the Area/ZIP Codes button into a stack?"¬with Help or OK or Cancelif it = Help thenTextDialog 128,Geneva,9,"128,129,130,131,132,133,134,135,136,137,138,139,140,141,142,143,144,145,146,147,148",10exit mouseUpend ifif it = Cancel then exit mouseUpanswer file "Select the stack to paste to:" of type STAKif the result = Cancel then exit mouseUpput it into pathNameanswer "Which layer should I paste in?" with Card or Background or Cancelif it = Cancel then exit mouseUpif it = Background then put on into bgFlagif it = Card then put off into bgFlagask "What card should I paste in?" with 1if it = empty then exit mouseUpput "" && it after cardLabelpastemexit mouseUpend mouseUpon pastemglobal bgFlag,pathName,cardLabel,thisStackset lockMessages to trueLockCursor stackwatchappear "Paste Alert",on,"70,131"lock screenset the visible of me to truepush cdgo cd id 3819select medoMenu "Copy Button"LockCursor pointerput "go ""e&pathName"e&&"in new window" into stackPathdo stackPathgo cardLabelscreenChangeappear "Paste Alert",offput the cantModify of this stack into oldModifyset the cantModify of this stack to falseput the userLevel into oldLevelset the userLevel to 5if bgFlag = on then doMenu Backgroundput the number of cd btns into cdNumput the number of bg btns into bgNumdoMenu "Paste Button"if (the number of bg btns>bgNum) or (the number of cd btns>cdNum) thenrepeat until the mouseClickif bgFlag = on thenset the loc of bg btn thisStack to the mouseLocelseset the loc of btn thisStack to the mouseLocend ifend repeatput "on mouseUp" & return & "go stack " & quote &¬thisStack & quote & return & "end mouseUp" into tempScriptif bgFlag = on thenset the script of bg btn thisStack to tempScriptelseset the script of btn thisStack to tempScriptend ifdoMenu "Button Info..."elseanswer "Sorry, because the access to this stack has been manually " &¬"restricted or protected with a password I can't paste the Area/ZIP button!" with "OK"end ifif bgFlag = on then doMenu Backgroundset the userLevel to oldLevelset the cantModify of this stack to oldModifylock screendoMenu "Close Stack"set the userLevel to 5choose browse toolset the visible of me to falsepop cdscreenChangeset lockMessages to falseend pastem</script>
.iso/HyperCard/Business/Area⁄ZIP Codes 3.1/Area_ZIP Codes 3.1/BMAP_9209.png){kind=link}
.iso/HyperCard/Business/Area⁄ZIP Codes 3.1/Area_ZIP Codes 3.1/PATs.png){kind=link}